home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / vol_300 / 333_02 / p051a.awk < prev    next >
Text File  |  1989-04-21  |  124b  |  10 lines
  1.  
  2. BEGIN        { FS = "\t" }
  3.  
  4.         { pop[$4] += $3 }
  5.  
  6. END        {
  7.         for (name in pop)
  8.             print name, pop[name]
  9.         }
  10.